                             - 423 -

              .    .

          .  -
   11000000   11 ,    192.
          -
,         
    .
             -
  .     (OR)   (AND)    -
  .          
          
 .      ,  ..    
 ,     ,   
  : Z = X OR Y.   
      8 ,   
  .    0      
      ,   0     
 .         
  .        
 ,      ,     
    0.     ,  -
 :

      1  2    1 2 

 7    1         0          1         1        0         0
    6    1         0          1         1        0         0
    5    1         1          1         1        1         1
    4    1   OR    1    =     1         1  AND   1    =    1
    3    0         0          0         0        0         0
    2    0         0          0         0        0         0
    1    0         1          1         0        1         0
    0    0         1          1         0        1         0

          
         .   ,
       -
    .    -
  .         
     ,      
  .         
        ,  ,
X.      ,      
.    (     )  
 128.     Y = X OR 128   Y   
,    X,     . -
    :

                             - 424 -

                   128     

    7         0               1          1
    6         1               0          1
    5         0               0          0
    4         1      OR       0     =    1
    3         0               0          0
    2         0               0          0
    1         0               0          0
    0         1               0          1

   128    .     ,
        ,   -
   .     , 
          
     .      -
           (
   ).    
2  3         : 4 + 8 =
12.

                   12      

    7         0               0          0
    6         1               0          1
    5         0               0          0
    4         1      OR       0     =    1
    3         0               1          1
    2         0               1          1
    1         0               0          0
    0         1               0          1

           . 
     ,     
,   ,    .   ,
        ,  -
     .     7  -
  255 - 128 = 127:

                   127     

    7         1               0          0
    6         1               1          1
    5         0               1          0
    4         1      AND      1     =    1
    3         0               1          0
    2         0               1          0
    1         0               1          0
    0         1               1          1

                             - 425 -

,   ,       (
  7),    1      127   
 1     .   ,    0 
 ,   0.
         ().  -
,           ,
     .      
101.     5,      5
      ,   -
          -
    1.       
,         -
:

                    5      

    2         0               1          1
    1         1               0          1
    0         0               1          1

            
 ,        .  
 255 - 4 - 2 - 1 = 248,     Y  =
X AND 248,   Z = Y OR 5.
              
   .        
 ,      ,   (-
,   5,   32).      ,
    :

                   32      

    7         1               0          0
    6         0               0          0
    5         1               1          1
    4         1      AND      0     =    0
    3         0               0          0
    2         0               0          0
    1         0               0          0
    0         1               0          0

      ,         
   ? ,  6  7    
0  3,      ,      
   () : 0, 64, 128  192. -
         ,  -
   ,      -
   .     
     .      
 ,   ,     1  0.
,     ,    .  
      (  )     
 .        -
      .       MID$ 
          
   .      -
    :

                             - 426 -

100 STATUSBYTE = PEEK(13): GOSUB 1000
110 PRINT BITPATTERN$   '  
 .
 .
1000 ''' 10-     8   
1010 BITPATTERN$ = ""    ' 
1020 FOR N = 7 TO 0 STEP -1  ' ,    7
1030 IF STATUSBYTE - 2^N < 0 THEN 1060  '    0
1040 BITPATTERN$ = "1" + BITPATTERN$    '   1
1050 STATUSBYTE = STATUSBYTE - 2^N: GOTO 1070
1060 BITPATTERN$ = "0" + BITPATTERN$    '   0
1070 NEXT
1080 RETURN

     ,       .
 ,          7   0,
  0     .     
 ,    MID$        
.   MID$     1,    ,
      1  8.       
 ,  BITFIELD$ = MID$(BITSTRING,4,2).  -
   ( 0  3)   , -
   :

100 BITFIELD$ = MID$(BITPATTERN,4,2): GOSUB 2000
110 PRINT DECVALUE
 .
 .
2000 '''  1  0   
2010 DECVALUE = 0   ' 
2020 FOR N = 1 TO LEN(BITFIELD$)  '   
2030 DECVALUE = DECVALUE + VAL(MID$(BITFIELD$,N,1)*2^(N-1)
2040 NEXT
2050 RETURN